home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual BASIC 5.0 (Ent. Edition) / Vb5ent Extractor.EXE / VB / SAMPLES / COMPTOOL / ACTVCOMP / COFFEE / ICOFFNOT.CLS < prev    next >
Encoding:
Visual Basic class definition  |  1996-11-27  |  921 b   |  34 lines
  1. VERSION 1.0 CLASS
  2. BEGIN
  3.   MultiUse = -1  'True
  4. END
  5. Attribute VB_Name = "ICoffeeNotify"
  6. Attribute VB_GlobalNameSpace = False
  7. Attribute VB_Creatable = False
  8. Attribute VB_PredeclaredId = False
  9. Attribute VB_Exposed = True
  10. Option Explicit
  11.  
  12. ' The ICoffeeNotify module defines an interface
  13. '   containing the call-back method, CoffeeReady,
  14. '   and a property used to store the client's
  15. '   ID (assigned by CoffeeMonitor2).
  16. '
  17.  
  18. ' CoffeeReady implemention contains all the code
  19. ' -----------      the client wants to execute
  20. '   when a call-back occurs.
  21. '
  22. Public Sub CoffeeReady()
  23. End Sub
  24.  
  25. ' NotifyID implementation must provide a Long to
  26. ' --------    store the ID number.  CoffeeMonitor2
  27. '   uses this to look up the call-back object when
  28. '   a request to disconnect is made.
  29. '
  30. Public Property Get NotifyID() As Long
  31. End Property
  32. Public Property Let NotifyID(ByVal NewValue As Long)
  33. End Property
  34.